***************************************************************
****Replication file for Ryan E. Carlin & Timothy Hellwig "The World Economy, Political Control, and Presidential Success." forthcoming in The Journal of Politics***
***************************************************************

****************************
***Figure 1
****************************
use figure_1.dta, replace
label variable commodities "Commodities/Total Exports"
label variable debsvc "Debt Service/Exports"
graph box commodities if year<2013, over(reporter_code) scheme(s1mono) name(com, replace) nodraw 
graph box debsvc if year<2013 & debsvc<1.5, over(reporter_code) scheme(s1mono) name(dbt, replace) nodraw 
graph combine com dbt, scheme(s1mono) c(1)
